(read_process_output): Fix mixing of Lisp_Object and

int.

diff --git a/src/process.c b/src/process.c
index daa4e3917444b54302c537b321adf013cfa255c4..0f1f702a348cded091be982bb737a7e5bae5aaf5 100644 (file)
--- a/src/process.c
+++ b/src/process.c
@@ -2828,11 +2828,11 @@ read_process_output (proc, channel)
             valid memory because p->outfd will be changed once EOF is
             sent to the process.  */
          if (NILP (p->encode_coding_system)
-             && proc_encode_coding_system[p->outfd])
+             && proc_encode_coding_system[XINT (p->outfd)])
            {
              p->encode_coding_system = coding->symbol;
              setup_coding_system (coding->symbol,
-                                  proc_encode_coding_system[p->outfd]);
+                                  proc_encode_coding_system[XINT (p->outfd)]);
            }
        }